home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Belgian Amiga Club - ADF Collection
/
BS1 part 34.zip
/
BS1 part 34
/
source code vol 1.adf
/
SMALLROUTS
/
RAM-DISK-OFF.S
< prev
Wrap
Text File
|
1999-09-26
|
603b
|
32 lines
DISKOFF:
move.l $4,a6
A4019e: lea SOURCENAME(PC),A1
A401a2: jsr -498(A6)
A401a6: tst.l D0
A401a8: beq.s RAMOFF
A401aa: move.l D0,A0
A401ac: lea 52(A0),A0
A401b0: move #$ff,D0
A401b2: move.l D0,(A0)+
A401b4: move.l D0,(A0)+
A401b6: move.l D0,(A0)
RAMOFF:
A401be: move.l #$00020004,D1
A401c4: jsr -216(A6)
A401c8: jsr -198(A6)
A401cc: tst.l D0
A401ce: bne.s A401c4
RETURNDOS:
CLR.L D0
MOVE.L 4,a6
JSR -138(a6)
LEA LIB(pc),a1
JSR -96(a6)
MOVE.L d0,a0
MOVE.L 22(a0),a0
MOVEQ #$00,d0
ERROR: RTS
LIB: DC.B 'dos.library',0
SOURCENAME: DC.B 'disk.resource',0,0